<?php 
/* 
 * ********* CVS HEADER ********* 
 * 
 * $RCSfile: admenvboxadmin.php,v $ 
 * $Date: 2007/07/30 21:16:45 $ 
 * $Revision: 1.3 $ 
 * 
 * ********* CVS HEADER ********* 
 */
if (!isset($envid)) {
	rportalerreur("Aucun environnement en param&egrave;tre !","?op=admenvliste");
}
require_once(get_path_module("environnement.environnement"));
require_once(get_path("param")."environnement.php");
$query="SELECT * FROM environnement WHERE id='$envid'";
$result=rportalrequete($query) or rportalerreur($query,"?op=admenvmod&argid=$envid");
if($environnement=rportalligne($result)){
    $env=new environnement;
    $env=restaure_environnement($environnement['environnement']);
    $box = $env->getbox($argid);
    $param = $box->getparam();
    $modif = $environnement['modification'];
    include(get_path_box($box->gettypenom()).'admin.php');
}
?>
